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FACILITY: SYSTST (SATS SYSTEM SERVICE TESTS) 

ABSTRACT: 


THIS MODULE CONTAINS SUBROUTINES WHICH, WHEN LINKED 
WITH SUCCOMMON. OB) FORM TEST MODULE SATSSS45 TO Ie SUCCESSFUL 
PERATION OF THE $SETPR E OKED 
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CHECKING FOR A MAL STATUS CODE 
AND EXPECTED PUNE TIONAL ITY PERFORMED. 


ENVIRONMENT: USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE, 
DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED. 


AUTHOR: THOMAS L. CAFARELLA, CREATION DATE: NOV, 1977 
MODIFIED BY: 
VERSION 1.5 : 25=-MAY-79 
01 LDS 10/11/79 Fixed bug caused by DIBSK_LENGTH change ACGO52.RNO mem 
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«SBTTL DECLARATIONS 
INCLUDE FILES: 


MACROS: 


EQUATED SYMBOLS: 
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0000 75 .PSECT RODATA,RD, NOWRT .N OfXE, LONG 
E TEST RO WARE STRING C <SATSS§S ; 1 ST MODULE NAME 
T STIMOD-NA ” San RING ate $T MODUL NAME DESCRIPTOR 
: : MSG1"INP“CTL: I.< SSSPR!42u: ton DITIONS: 
¢ FAO CTL STRING FOR MSG1 IN SUCCOMMON.MAR 
9 6 MSG3_ERR_CTL:: STRING I,< *SSSPR!42W: !AS> 
1 ; FAO CTL °°" 1G FOR mSG3 IN SUCCOMMON.MA 
51 ; SUBJPRN: STRING 1,<SATSSS45_CRE>'; PROCES: » MBX NAME FOR CREATED PROCESS 
4 IMAGNAM: TRING I,< <SYSTSTSRES : SATSUTO .EXE> ; IMAGE NAME FOR CREATED PROC 
4 4 QUOTALIST: QUOTA CPU : INFINITE Chu 
9 5 SQUOTA BYTLM, 12 ; BYTE LIMIT FOR BUFFERED 1/0 
0 5 : QUOTA FILLM.2 ; OPEN FILE COUNT LIMIT 
QUOTA PGELQUOTA, 10 : PAGING FILE QUOTA 
098 8 SQUOTA PRLM.¢ : SUBPROCESS QUOTA 
0C9D 9 SQUOTA TQELM, ; TIMER QUEUE ENTRY QUOTA 
00OA2 =: 90 $QUOTA LISTEND : DEFINES END OF LIST 
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-SBTTL CONDITION TABLES 
weeee CONDITION TABLES FOR SETPRI SYSTEM SERVICE ***#* 
COND 1. “<NOT'S <PID ADDRESS>, - 


SPECIFIED>, 
PECIFIED, NON=ZER 0>,- 


<SPECIFIED. ZERO>, = 

.ADDRESS 0 

“ADDR ESS  SUBJPID 

DRESS §_ZEROPID 
COND  2,NOTARG,<PROCESS NAME ADDRESS>,- 
<SPECIFIED>, - 
<NOT SPECIFIED>,- 

- ADDRESS SUBJPRN 

“ADDRESS 
COND  3,NOTARG,<PROCESS TYPE>,- 


<§ > 
<SUBPROCESS 
<DETACHED, *Digrenenr GROUP>, - 
<DETACHED, SAME GROUP, SAME MEMBER> 
<DETACHED, SANE GROUP, DIFFERENT MEMBER>, - 


~ LONG “XFFFFFFFF ; PSEUDO-UIC 
LONG : PSEUDO-UIC 
-BLKL 1 3; UIC 
~BLKL 1 ; UIC 
~BLKL 1 ; ulc 


COND 4,NULL 
COND 5 NULL 
-PSECT SATSSS45,RD,WRT,EXE 


5 
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v04=000 T EANUP mitt 7 03:43 it ETP 


__ 
mm 

=z 

=z 


TPSY. SREISAY 13es09. mars 1 ee a 
er .SBTTL TM_SETUP, TM_CLEANUP | 
; FUNCTIONAL DESCRIPTION: 
acovinen wouseldeBELe AM etEfttc a ERB aE SHEEPYY, o 

; TEST MODULE EXECUTI 
CALLING SEQUENCE: 
; BSBW TM_SETUP BSBW TM_CLEANUP 

INPUT PARAMETERS: 

; NONE 

; IMPLICIT INPUTS: 

; NONE 

; OUTPUT PARAMETERS: 

; NONE 

; IMPLICIT OUTPUTS: 


TM_SETUP: COND TABLE INDEX REGISTERS (R2,3,4,5,6) CLEARED; 
ALL PRIVILEGES ACQUIRED. 


; COMPLETION CODES: 
EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 
; SIDE EFFECTS: 


SS CHECK AND ERR_ EXIT MACROS CAUSE PREMATURE EXIT 
(VIA RSB) IF ERROR ENCOUNTERED. 


TM_SETUP: : 
53s CLRL OR ; INITIALIZE 
D4 CLRL OR 3. CONDITION 
24 D4 00 CLRL RG i tees TABLE 
5 D4 00 CLRL RS i seeeee INDEX 
36, p& 00 CLRL RO b pases . REGIS 
FFF3' 30 00 BSBW = MOD_MSG_PRINT PRINT TEST MOD 
00000900"EF 90000000°EF DE 0 ROVAL TEST “ROD. SUCC, TMD ADDR; ASSUME END RSG 
05 00 —90000000°BF FO 00 INSV —- #SUCTESS7#0,#5 ,MOD_MSG_ tint ; ADJUST STATUS CODE FOR SUCCESS 
DE TO ACCESS P 


MOVL Oe? Pech RO GET SS HEADER SDoRESS 
MOVAL PHOSH enon PRIVMASK CET PRIV MASK ADDRESS 
MODE  FROM,5$ ; BACK TO USER MODE ” 

PRIV  — ADD, AL it ; GET ALL PRIVILEGES 


59 0000N000'9F D0 


TERS 

ULE BEGIN MSG 
rae SHOW SUCCESS 
QO000000"EF 69 ODE 


~—_—__-__--—_, rr 
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$042000 TM_SETUP, TM_CLEANUP gr En 4 90:33:23 YOETPSY. Se RCJSATSSS45.MAR; 1 ab 
77 7 SSETPRN_S TEST_MOD_NAME_D ; SET PROCESS NAME 
84 : 38 CHECR NORM : CHECK STATUS CODE RETURNED FROM SETPRN 
Be WAKES SELFPID : GET MY PI 
C 9 3 CHECK NORMAL s CHECK FOR NORMAL RETURN 
OEF TBER S + UNDO ABO 
OF6 : SS_CHECK NORMAL 3 CHECK FOR NORMAL RETURN 
i : ; THE FOLLOWING CODE ESTABLISHES UIC'S IN THE CONDITION 3 TABLE 
124 $ MODE ; KERNEL MODE TO ACCESS PCB 
59 00000000'9F 0 p47 MOVL atin Cunece, R9 ; GET CURRENT pce ADDRESS 
59 00BC C9 D0 148 8 MOVL SL ICKR ; PICK UP UIC FROM PCB 
0133 ; MODE t «es AND GET BACK TO USER MODE 
0136 1: RO NOK CONTAINS "MY'’ UIC 
9A EP § WOVZBL #2,R10 : GET COND3 TABLE INDEX NUMBER INTO A REG 
59 00010000 8F C1 0157 4 ADDL3 #*X10000,R9,COND3_ECR10] ; PUT DIFF GROUP UIC INTO 3RD TABLE ELT 
0000024F 'EF4A 015€ 
5A DS 0164 5 INCL R10 : POINT TO 4TH COND3 TABLE ELEMENT 
QOOO024F'EF4A 59 DO 0166 6 MOVL R9,COND3_ECR10] + PUT MY UIC INT 
A 06 O16¢ 7 INCL. R16 ; POINT TO 5TH CONDS TABLE ELEMENT 
OQOOOO24F°EF4A 59 01 C1 O17 8 ADDL3 i R9,COND3_ECR10) PUT DIFF MEMBER UIC INTO THE TABLE 
0179 9 SCREMBX_S S CHAN ASROKCAAN LOGNAM=SUBJPRN, = ; GET MAILBOX FOR PROCESS 
0179 0 MAXMSG=#120, PRORSK=A0, BUF QU0=#24 
019E 1 SS_CHECK NORMAL CHECK NORMAL COMPLETION 
01CC é SGETCHN_S CHANEA BXCHA : GET CHAN INFO (UNIT NUMBER) 
01CC PRIBUF=MBXCHANINFO 
0166 4 SS_CHECK NORM CHECK NORMAL COMPLETION 
00000088'EF 00000020'EF  3¢ Oei4 5 MOUZWL MBXCHANINFO+8+D1BSW_ UNIT, :MBXUNIT SAVE MAILBOX UNIT NUMBER 
05 O2t1F 6 RSB 3 RETURN fo MAIN ROUTINE 
9220 7 TM_CLEANUP: 
0220 8 SDELMBX _S__MBXCHAN DELETE TERMINATION MAILBOX 
FDCF’ 30 Ook 9 BSBW  ~MOD_MSG_PRINT PRINT TEST MODULE END MSG 
05 0231 0 RSB RETURN TO MAIN ROUT INE 
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DITI 
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CLEANUP 


Bw CONDX 
2304,5 


$ 
1,2 
CONTAIN CURRENT CON 


TABLES 1,2,3,4,5, 


WHERE X = 


: INPUT PARAMETERS: 
2,3,4,5,6 
FOR COND 


BSBW CONDX 
CONFLICT = 0 
; OUTPUT PARAMETERS: 


; CALLING SEQUENCE: 
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; IMPLICIT INPUTS: 
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¢ COND1 
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COND2_ 


7 
98 


oa 


9 


COOOOCOCOCOOCOCOOSOSSSOSSOOSOSOSOOSOSOSSOSSOSSOCOSOSOSSOSOSSSOOCOOSSOSOOCOOOSOSoOOoOoO 


wownwn wo 
oo oOo °O 


o 
Oo 
= 
om 
aad 


00000170°EF42 


—— O = OO 


We wus 


0000024F "EF 44 


O000024F "EF 44 


uw 
wo 


: PROCESS IS ''SELF" 

CMPL ONES, COND3_ECR4] 
BEQLU COND SX 
BRB 0$ 
10$: 

> PROCESS IS "OTHER" 


CMPL ONES, COND3_ECR4] 
BNEGU CONDSx 


MOVB ONES ,CONFLICT 
COND3X: 


COND3_CLEANUP: : 
RSB 
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ON SUBROUTINES = SETUP AND CLEANU 5=SEP-19 
COND3:: 

CMPL #SUBJPID, COND1_ECR2J 

BEQLU 

TSTL COND2_ECR3] 

BEQL $ 

CMPL = RG, #2 

BEQL 208 

BRB 10$ 
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NON-ZERO PID SPECIFIED 
YES == PROCESS IS "OTH 
1S PROCESS NAME  SPECIF 
NO == SUBJECT PROCESS 
DOES CONDITION 3 SPECI 
YES -- PROCESS NAME FO 
NO == MAKE SURE COND 


; 4's CONDITION 3_SP 


ECIF 
-- THEN ALL 3 CONDI 
LICT 


; NO -- INDICATE CONF 


; DCES CONDITION 3 SPECIFY ‘'SELF*’ ? 
; NO == THEN ALL 3 CONDITIONS ARE CONSISTENT 


; YES -- INDICATE CONFLICT 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN 10 MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
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SATSSS45 SATS SYSTEM SERVICE TESTS S$SETPRI (SUCC 16-SEP-1984 00:55:25 VAX/VMS Macro V04-0 P 1 
y042000 FORM_CONDS ety fs $0: 3523 LOE T PSY eae ISAT esses MAR: 1 lS 
a ie .SBTTL FORM_CONDS 
§ FUNCTIONAL DESCRIPTION: 
§ ; ORM_CONDS FORMATS AND PRINTS INFORMATION ABOUT 
40 ; THE CURRENT ELEMERY IN EACH OF THE CONDITION TABLES. 
4¢ ; CALLING SEQUENCE: 
44 ; BSBW FORM_CONDS 
46 : INPUT PARAMETERS: 
8 48 : NONE 
8 20 ; IMPLICIT INPUTS: 
8 3 : R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES 
0 8 53; FOR 8 OND TABLES 1,2,3,4,5, RESPECTIVELY 
0 54 : FOR X = 1,2,3,4,5 : 
028 55: CONOX’T’= TITLE TEXT FOR CONDX TABLE 
028 36 : CONDX“TAB = ELEMENT TEXT FOR CONDX TABLE 
0283 357; CONDX"C = CONTEXT OF THE CONDX TABLE 
at 38 3 CONDX_E = DATA ELEMENTS OF THE CONDX TABLE 
096 60 + OUTPUT PARAMETERS: 
a8 6¢ : NONE 
028 64 : IMPLICIT OUTPUTS: 
028 65; 
a 
0283 68 : COMPLETION CODES: 
0 69 ; 
0283 20 ; NONE 
098 re : SIDE EFFECTS: 
036 74: NONE 
Bs e : 
0 5 8 , 
Bh 
0 0 FORM_CONDS:: 
1 $FAO_S MSG1_INP_CTL,FAO_LEN, FAO_DESC. TESTNUM 
A ‘ 7 FORMAT CONDITIONS HEADER MSG 
FDS5B" 30 A BSBW OUTPUT_MSG + se. AND PRINT IT 
4 0 1 02A 4 CMPB ss #COND1=C,, NULL : IS°CONDITION 1 NULL ? 
03 12 O2A8 5 BNEQU 10$ : NO <= CONTI 
O0OBF 31 AA : ae BRW FORM_CONDSX : YES -= SUBROUTINE IS FINISHED 
00000000‘ EF 9000 125°EF 0D AD 8 " MOVAL ~=—s«COND1_T st ; SAVE ADDRESS OF CONDITION 1 TITLE FOR F 
00000000 ' EF 900 00132 2°E EF42 D BB MOVL CONDI cThB R2) MSG B ; SAVE ADDR OF COND 1 CURR TEXT ELT FOR F 
00000 00 9 C4 2 MOVE 4#CON 6 CTX SAVE CONDITION 1 CONTEXT FOR FAO 
(B 39 MOV_VAL COND , EONDT. etR2). MSG baTAL; GIVE COND 1 DATA VALUE TO FAO 


-o 
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v04=000 FORM_CONDS orSepn SB Geist ics LORtPey.sacigavesscs.man;1 2%" Uf, 
FD32" 3 CB 33 BSBW WRITE_MSG2 ; FORMAT AND WRITE CONDITION 1 MSG 
14 C 9 CMPB #OND2. és #NULL ; IS CONDITION 2 NULL ? 
1 D 94 BNEQU 2 ; NO_== CONTINUE 
0096 «3 Ds % ‘an BRW FORM_CONDSX t YES == SUBROUTINE IS FINISHED 
QO000000'EF  QO00017C'EF oD D 9 MOVAL COND ; SAVE ADDRESS OF CONDITION 2 TITLE FOR FAO 
00000000' EF 00000192 EFES 06 pe 98 MOVL COND STABtRS) MSG_B SAVE ADDR OF COND 2 CURR TEXT ELT FOR FAO 
N0000000'EF 00 ED 39 MOVB  #CON p2 G_€TxT SAVE C CONDITION 2 CONTEXT AO 
F4 400 MOV_VAL COND t EON? etR3y, MSG_ baie. G1ve COND 2 DATA VALUE TO FAO 
FDO9" 30 F4 401 BSBO WRITE-MSG ; FOR RMAT b uni TE’ co CONDITION MSG 
14 9 1 OOF? 4 ‘ CMPB BCONDS. C,#NULL 3 15 CONDITION 
12 O2FA 4 BNEQU 30$ NO == CONTINUE 
006d = 31 FC 4 4 a BRW FORM_CONDSX + YES == SUBROUTINE IS FINISHED 
Q00000G0'EF  OOO001BA'EF DE O2FF 496 MOVAL COND sts : SAVE ADDRESS OF CONDITION, 3 TITLE FOR FAO 
00000000' EF 000001 CBE F446 DO 030A 40 MOVL COND stiB Ra] MSG B ; SAVE ADDR OF COND 3 CURR TEXT ELT FOR FAO 
00000000'EF 00 90 0316 408 #CONDS G_¢Tx VE CO NDITION 3 CONTEXT ‘OR FAO 
1D 40 MOV_VAL COND3_C ENDS. EtRsd, MSG_ BATA GIVE COND 3 DATA VALUE TO FAO 
FCEO' 30 310 410 BSBO «WRITE MS RMAT AND ORITE CONDITION 3 MSG 
4 14 91 «0 9 411 CMPB WCONDE” C,#NULL : Se CONDITION 4 NULL 
47 13 03 alg BEQLU FORM CONDSX + YES == SUBROUTINE is” FINISHED 
Q0000000'EF  00000263'EF DE 0325 41 MOVAL CONDS + SAVE ADDRESS OF CONDITION 4 TITLE FOR FAO 
Q0000000°EF — 00000263'EF4S DO 0330 414 MOVL  COND4 CTABERS MSG_B ; SAVE ADDR OF COND 4 CURR TEXT ELT FOR FAO 
00000000'EF 146 90 O33C 415 MOVB ‘ CON etx SAVE CONDITION 4 CONTEXT FOR FAO 
034 416 MOV_VAL COND4_C Ce NDE. ECRSI, MSG _bATAT : GIVE COND 4 DATA VALUE TO FAO 
FCBA' 30 034 41 BSB0 GRite “MSG ; FORMAT AND sh CONDITION 4 MSG 
16 146 91 0346 418 CMPB = #CONDS_C, #NULL 3 1S CONDITION 5 NULL? 
21. 13 «0349 «419 BEQLU FORM CONDSX ; YES == SUBROUTINE IS FINISHED 
QO000000'EF  00000264'EF DE 0348 420 MOVAL CONDS_T : : SAVE ADDRESS OF CONDITION 5 TITLE FOR FAO 
Q0000000'EF — 00000264°EF46 DO 0356 421 MOVL  CONDS~TABLREJ,MSG_ ; SAVE ADDR OF COND 5 CURR TEX xT ELT FOR FAO 
00000000'EF 14 90 0362 4 é MOVB ND5_C,MSG_CTXT VE CONDITION 5 CONTEXT FOR FAO 
036 4 MOV_VAL COND» mY EONDS. ECR6),MSG_ baal : GIVE COND 5 DATA VALUE TO FAO 
FC94" 30 0369 42% BSBO «WRITE ~MSG2 ; FORMAT AND WRITE CONDITION 5 MSG 
036C 425 FORM_CONDSX: 
05 036C 426 RSB ; RETURN TO CALLER 
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r3ie Saag : pony CONDITIONS BE PRINTED ? 

BSBW FORM_CONDS ; YES == FMT & PRINT ALL CONDS FOR THIS T.C. 
MOVL SELFPID,SUBJPID ; ASSUME THE SUBJECT PID IS SELF 

CLRL ZEROPID ; CLEAR ZERO PI 

CMPL QUES .CONDS_ECR4J ; IS PROCESS FOR THIS TEST CASE SELF ? 
BNEQU $ ; NO -- CONTINUE 

BRW 10$ ; YES == DON'T CREATE A PROCESS 


SCREPRC_S PIDADR=CREPID PRCNAM=SUBJPRN, 
1C=CON 4}, IMAGE=IMAGNAM, | 
MBXUNT= PERNT. ovoTA aura 


THE SUBJECT PROCESS 
SS_CHECK NORMAL - AKE SURE IT CREATED OK 
MOUL  CREPID, SUBJPID + MAKE AME meuBIeT PID = THE ONE JUST CREATED 
SSETPRI_S PIDADR=SUBIPID, PRI=#0, 
PRI=ORIGPRI : GET ORIGINAL PRIORITY 
S_CHECK NORM AL CHECK FOR NORMAL RETURN 
See t Pay $ PIDADR=SUBJPID, PRI= conf ; RESTORE ORIGINAL PRIORITY 
SS_CHEC aah CHECK FOR NORMAL RETURN 
MOUL “EERG.0E »DEST_PIDADR : GET PID ADDRESS OUT OF TABLE 
MOVE CONS “ECR + PRCNAM ADDR INTO REG FOR INDIRECT REF'RNCE 
CLRL «RB ; INITIALIZE PRIORITY VALUE REGISTER 
CLRL ZEROPID ; ENSURE ZEROPID IS STILL ZERO 
t weeeee SYSTEM SERVICE CALL WHICH IS THE SUBJECT OF THIS TEST CASE *eeee 
SSETPRI_S PIDADR=@DEST_PIDADR, PRCNAM=(R9), 
PRI=R8, PRVPRI=ESTPRI 
CMPL —— RO, #SS$_NORMAL ; CODE RECEIVED = CODE EXPECTED ? 
BEQLU 1 : YES == CONTINUE 
MOVL § #SS$_NORMAL,EXPV ; NO == LOAD UP EXPECTED AND ... 
MOVL __RO,RECV RECEIVED VALUES, THEN EXIT 
ERR_EXIT LONG, <INCORRECT STATUS tobe RETURNED FROM SETPRI> 
TSTL DEST. PIDADR ; PID RETURNED BY SETPRI ? 
BEQL : NO -= KEEP GOIN 
CMPL SUBJPID, ,@DEST_PIDADR  ; YES == IS IT THE CORRECT ONE ? 
BEQL 208 : YES == CONTINUE 
MOVL § SUBJPID,EX PY NO =--LOAD UP EXPECTED AND 
MOVL aDEST_PIDAD RECEIVED VALUES, THEN EXIT 
ERR EXIT LONG? oe INCORREET” PID RETURNED BY SETPRI> 
TSTL = RB ; SETTING PRIORITY 0 ? 
BNEG 40% ; NO == CONTINUE 
nove ORIGPRI.R10 > YES == EXPECT ORIGINAL PRIORITY RETURNED 


SUBB3 = #1,,R8, R10 ; COMPUTE EXPECTED PRIORITY TO BE RETURNED 
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Sigh a. that tha PRiORITY = THAT EXPECTED ? 


; D AN 
CEIVED VALUES, THEN EXIT 


RECV eee RE 
PRIORITY VALUE NOT RETAINED BY SETPRI> 


LOOP THRU ALL LEGAL PRIORITIES 


PRI, = 

GET BACK ye ort woo. 

CHECK FOR MAL RETURN 

DID SETPRI NREMEMBER PREVIOUS PRI (31) ? 
YES == CONTINU 

NO == LOAD “f tet th ED 

-2. RECEIVED VALUES, THEN. EXIT 

RETAINED BY sttp RI> 

WAS A PROCESS CREATED ? 

YES == CONTINU 


NO == ALL FINISHED 


; ALLOW CREATED PROCESS TO FINISH 


ECK FOR NORMAL STATUS CODE 


UCC 16-SE 4 00:55: 
g-3e Hn 90:3 : 
CMPB ss R10, ESTPRI : 
BEQLU 3% 3 
MOVE = R'1 EXPY : 
MOVB _ESTPRI . 
ERR_EXIT BYTE,< 
ACBB es #31,#1,R 
SSETPRI_S PIDA gm suesPID, pRi=oriG 
PRVPRI=ESTPRI ; 
SS$_CHECK NORMAL ; 
CMPB «#31, ESTPRI 3 
BEQLU 60$ ; 
wove #31 EXPY ; 
OVB  ESTPRI,RECV 
ERR _EXIT BYTE, <PRIORITY VALUE not 
CMPL  CREPID,SUBJPID : 
BEQLU 65$ ; 
BRW VERIFYX : 
SWAKE_S S UB PID ; 
SS_CHECK CH 
$aTOw_S CHAN MBXCHAN, FUNC= #108, READVBLK, - 
P1=MBXBUFF+8. P2=MBXB 


SS_CHECK NORMAL 
"RSB 


-+. AND WAIT FOR IT TO SEND MAIL 
CHECK FOR NORMAL STATUS CODE 


RETURN TO CALLER 
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VFY ~CLEAMUPY 
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a te 


OETPSY.$ -S {SATS 13g528, MAR: 1 — () 


UETPSY 


; WAS ORIGINAL paonny ever CHANGED ? 
P IS COMPLETE 


CAPB ONES ped 
EQLUVFY 
t abled 
S CHECR NORM CHECK 
ONES ,ORIGPRI 3; INDI 
3; RETU 


END 


NO == CLEANU 
PIDADR=SUBJPID., PRI=OR]GPRI ; YES -- GET BACK Ms esters 


FOR NORMAL RETUR 


are PRI NOT CHANGED YET FOR NEXT T.C. 
TO CALLER 


Ss 
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bo:33i23 axeye 
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SSay SSS 


$$ = 000 FR DIBSW_UNIT = 0000000C 

SCHAR = 5 EFLAG aeeeeeee 4 
SSSCHARS1 2 4 ESTPRI 00000124 3 
SSSCHARS = A EXPV eeeeeent 4 
SSSCHARS = 00000019 FAO_DESC eeeteene 4 
SSSCHARSS = § 1 FAO_LEN eeeteeee 4 
SSSCHARSS = 8 6 FORA_CONDS 8 00283 4 

COND = 000 4 FORM_CONDSX $% of 4 

SSSSTRINGS = 4 001 IMAGNAM 000006 02 
SSSSTRINGS2 = 00000005 10$_ READVBLK eeeteeee 04 
ae = eeeR ae * $F 
sre = S888 cha se 
CFLAG eeekeeee =X 7 MBXCHANINFO QO0000C R 03 
CHMRTN ekkreeee =X 4 MBXUNIT 0000088 R 03 
CHM_CONT eeneeeee = KX 04 MOD _MSG_CODE eeneeeee XK 04 
COMP SC eereeeee KX 04 MOD_MSG_ PRINT eeeeeree =X 04 
ONDT 00000232 RG 04 MSGT_INP_CTL 0000019 R 8 
COND1_C = et! MSG3_ERR_CTL 0000039 RG 0 
COND1_ CLEANUP 00000233 RG 04 MSG_A weaneeee =X 8604 
COND1_E 00000170 R 03 MSG_B keeeeeee = X 04 
COND1_H 00000131 RG 03 MSG_CTXT aeenenee KX 04 
COND1_T 00000125 R 03 NOTARG = 00000000 G 
COND1_TAB 00000132 R 03 NULL = 00000014 G 
ag 00000234 RG 04 ONES aeeeeeee =X 04 
COND2_C = 00000 99 ORIGPRI 00000120 R 03 
COND2_ CLEANUP 00000 RG 04 OUTPUT_MSG eeeeeeee =X 04 
COND2_ 00000182 R 03 PCBSL_OIC = 000000BC 
COND2_H 00000191 RG 03 PCV aereeeee =X = 04 
COND2_ 0000017C R 03 PHD$Q_PRIVMSK = B08 8888 
COND2_ TAB 00000192 R 03 PQL$_BYTLM = 0000000 
COND 444 36 RG 04 PQL$_CPULM = 00000004 
COND 3X 000027D R 04 PQL$_FILLM = 00000006 
COND3_C = 00000 00 PQL$_LISTEND = BADR OOF 
COND3_ CLEANUP 0000027E RG 04 PQL$_PGFLQUOTA = 00000007 
COND3_E QOO00024F R 03 PQL$_PRCLM = 00000008 
COND3_H 44 4 SE RG 03 PQL$-TQELM = 00000009 
COND3_T 000001BA R 03 PRIVAMASK 0000000 R 03 
COND3_TAB 0000 4 R 03 PRIV_ARGS = 00000002 
COND4 0000027F RG 04 PROCESS_ERR aeeaneneer xX 04 
COND4_C = 00000014 = 00000008 G 
COND4_ CLEANUP si 444 80 RG QUOTALIST 00000084 R 02 
COND4 _H 00000263 RG 3 RECV aeereeee KX 04 
COND4_T 4 63 R 83 ard BH: eeeeenee =X 8 
COND4_ TAB g R Q CHL eeenenee x 4 
COND 0 1 RG 04 ot ct. CORPCB eeeetere x 04 
COND5_C = 8 14 SELFPIO 00000114 R 03 
COND5_ CLEANUP ei RG 04 SS$_NORMAL aereeeee =X 04 
COND5_H ? RG ; SUBJPID BO NOTE R 83 
COND5_T 4 R SUBJPRN 0000051 R 0 
CONDS- TAS 0 64 R 3 aUEcESS eeeneeee =X 4 
CONFLICT eteereee xX 4 SYSSCMKRNL eeenerer GX 4 
CREPI 00000118 R 3 SYSSCREMBX eeeeeeee GX 4 
CTL$GL_PHD eeeeeeee =X 4 SYSSCREPRC eaeeneee 6X 4 
DESC = 010 G SYSSDELMBX eeeneeee GX 4 
DEST_PIDADR 195 R 03 SYSSDELPRC aeeeenee 6X 4 
DIBSR_LENGTH z 074 SYSSFAO eeneneee 8 §6X 4 
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SEP=1984 


SYSSGETCHN terereee 6X 4 
SYSSHIBER eeeeeeee GX 4 
YS$Q10W eeeeeeee GX 4 
SYSSSETPRI teeereee GX 4 
SYSSSETPRN eeeneeee GX 4 
SYSSSETPRV teeeeeee GX 4 
SYSSWAKE eeeeeeee GX 4 
TESTNUM eeeeeere =X 4 
TEST_MOD_NAME 90000000 RG 3 
TEST_MOD_NAME _D 0000009 R 
TEST _MOD_SUCC eeeeeeee 4 
D ADDR eeereeee 4 
TM_CLEANUP 00000 a RG 4 
TM SETUP 00000000 RG 4 
VERIFY 00000 $ RG 04 
VERIFYX 4 R 04 
VFY CLEANUP 0000774 RG 04 
VFY_ CLEANUPX QOO007E4 R 04 
wORB = 00000002 G 
WRITE _MSG2 ekeeeeee 04 
ZEROPTD 00000110 R 03 


PSECT name Allocation PSECT No. Attributes 


» Ss. % 00000000 ( 0.) 69 ( 0.) NOPIC USR CON’ ABS LCL NOSHR NOEXE NORD 
SABSS 00000000 (¢ Q.) 1¢( #1.) NOPIC USR CON ABS LCL NOSHR EXE RD 
RODATA OGOOOOA7 ( 167.) os ( ¢°} NOPIC USR CON’ REL LCL NOSHR NOEXE 
RWDATA penn eee ( 613.) 03 ¢ -) NOPIC USR CON REL LCL NOSHR NOEXE 
SATSSS45 000007FO (¢ 2032.) O04 ¢ 4.) USR CON REL LCL NOSHR EXE 
pemmewewonewweeooceccence} 
H Performance indicators H 
Phase Page faults CPU Time Elapsed Time 
Initialization 33 0:00:00.11 8:00:00. 3? 
Command processing 137 0: 8: 0.66 0:00:01. 
evabel. cebte’ vert xo) (80:00:00:78 90:00:07 a6 
Pass 139 :00:02.36 0:0 05°64 
Symbol table output 16 :00:00.11 700.11 
Psect synopsis output :00: Be 0:00:00.03 
Cross-reference output 8: 8: .00 0 8308-08 
Assembler run totals 63 :00:13.66 0:00:28.6 


The yorking set Limit was 1500 pages. 

51477 bytes_(101 pages) of virtual memory were used to buffer the intermediate code. 

There were 30 pages of symbol table space allocated to hold 490 non-local and 60 local symbols. 
637 source lines were read in Pass 1, producing 26 object records in Pass 2. 

47 pages of virtual memory were used to define 37 macros. 


o V04-0 
UETPSY.SRCJSAT 


NOWRT NOVEC BYTE 
WRT NOVEC BYTE 


WRT NOVEC BYTE 


dD 11 
SATSSS45 SATS SYSTEM SERVICE TESTS SSETPRI (SUCC 4” Hp gy: 33:23 cether Bacto Vesers mast 
ao «MAR; 


VAX=-11 Macro Run Statistics 


¢eeeeeceeeeeeceseecn ee ee aes ewe d 


! ; Macro. Library statistics ! 


ewe neem eee em eno e em ae nom on } 


Macro Library name Macros defined 
oun :PSHRLIB IY ETP.MLB; 1 
J3C18-ACB B:? 
SDUA Sys iB3 STARLET T.MLB;2 : 
+32588 (atl Libraries) 4 


892 GETS were required to define 34 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:SATSSS45/0BJ=0BJ$:SATSSS45 MSRC$:SATSSS45/UPDATE=(ENHS$: SATSSS45) +EXECML$/LIB+SHRLIB$:UETP/LIB 
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